home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 1997 #1 / Amiga Plus CD - 1997 - No. 01.iso / pd / programmierung / proasm / routines / gtfdefs.r < prev    next >
Text File  |  1995-10-16  |  5KB  |  242 lines

  1.  
  2. ;---;  gtfdefs.r  ;------------------------------------------------------------
  3. *
  4. *    ****    DEFINITIONS FOR GTFACE    ****
  5. *
  6. *    Author        Stefan Walter
  7. *    Version        1.09
  8. *    Last Revision    16.10.95
  9. *    Identifier    gtf_d_defined
  10. *    Prefix        gtf_    (GadToolsFace)
  11. *                 ¯  ¯    ¯
  12. ;------------------------------------------------------------------------------
  13.  
  14. ;------------------
  15.     ifnd    gtf_d_defined
  16. gtf_d_defined    =1
  17.  
  18. *--------------------------------------------------------------------
  19. * Various
  20. *
  21.  
  22.  
  23. *
  24. * Minimal IDCMP flags required for proper functioning. 
  25. *
  26. gtf_MINIDCMP        equ    $02000004
  27.  
  28.  
  29. *
  30. * Miscellanous definitions
  31. *
  32. POSINFO            equ    -1    ;for own 'generic' gadgets
  33.  
  34.  
  35. *--------------------------------------------------------------------
  36. * Bit definitions used in the flag field of a GTFace gadget entry.
  37. * There are three kind of flags:
  38. *
  39. *    0-3    are checked for each kind of gadgets before it is created.
  40. *    4-5    are checked for each kind of gadgets after it is created.
  41. *        The flag handlers tinker with the created gadget structure.
  42. *    6-15    have seperate meanings for different gadget types. There
  43. *        are flags that are valid for more than one gadget kind,
  44. *        i.e. RightJustify or Label.
  45. *
  46. * The bits to choose are generally set via macros.
  47. *
  48.  
  49.  
  50. *
  51. * General
  52. *
  53. gtf_b_Underscore    equ    0
  54. gtf_b_Disabled        equ    1
  55.  
  56. gtf_b_ToggleSelect    equ    4
  57. gtf_b_Selected        equ    5
  58.  
  59.  
  60. *
  61. * CheckBox
  62. *
  63. gtf_b_Checked        equ    8
  64.  
  65.  
  66. *
  67. * Integer
  68. *
  69. gtf_b_Number        equ    8
  70. gtf_b_MaxChars        equ    9        ;also for String
  71. gtf_b_NoTabCycle    equ    10
  72. gtf_b_RightJustified    equ    11        ;also for String
  73.  
  74.  
  75. *
  76. * ListView
  77. *
  78. gtf_b_Labels        equ    8        ;also for MX and Cycle
  79. gtf_b_ReadOnly        equ    9
  80. gtf_b_ShowSelected    equ    10
  81. gtf_b_LVSelected    equ    11
  82.  
  83.  
  84. *
  85. * MX (Mutual Exclude)
  86. *
  87. ;gtf_b_Labels        equ    8        ;see ListView
  88. gtf_b_Active        equ    9
  89. gtf_b_Spacing        equ    10
  90.  
  91.  
  92. *
  93. * Slider
  94. *
  95. gtf_b_RelVerify        equ    8
  96. gtf_b_Min        equ    9
  97. gtf_b_Max        equ    10
  98. gtf_b_Level        equ    11
  99. gtf_b_MaxLevelLen    equ    12
  100. gtf_b_LevelFormat    equ    13
  101. gtf_b_LevelPlace    equ    14
  102. gtf_b_DispFunc        equ    15
  103.  
  104.  
  105. *
  106. * Cycle
  107. *
  108. ;gtf_b_Labels        equ    8        ;see ListView
  109. ;gtf_b_Active        equ    9        ;see MX
  110.  
  111.  
  112. *
  113. * String
  114. *
  115. gtf_b_String        equ    8
  116. ;gtf_b_MaxChars        equ    9        ;see Integer
  117. gtf_b_TabCycle        equ    10
  118. ;gtf_b_RightJustified    equ    11        ;see Integer
  119. gtf_b_EditHook        equ    12
  120.  
  121.  
  122. *
  123. * Text
  124. *
  125. gtf_b_Text        equ    8
  126. gtf_b_CopyText        equ    9
  127. gtf_b_Border        equ    10
  128.  
  129.  
  130. *--------------------------------------------------------------------
  131. * The object structures.
  132. *
  133.  
  134. *
  135. * Object
  136. *
  137.             rsreset
  138. gfb_next        rs.l    1
  139. gfb_flag        rs.b    1
  140. gfb_type        rs.b    1
  141. gfb_xpos        rs.w    1
  142. gfb_ypos        rs.w    1
  143.  
  144. gfb_style        rsval
  145. gfb_width        rs.w    1
  146. gfb_text        rsval
  147. gfb_heigth        rs.w    1
  148. gfb_filled        rs.w    1
  149.  
  150. gfb_SIZEOF        rsval
  151.  
  152.  
  153.  
  154. *--------------------------------------------------------------------
  155. * The key structures. When GTFace deals with windows and gadgets, it
  156. * does this by using a key structure which holds all the information
  157. * that is neccessary.
  158. *
  159.  
  160. *
  161. * WindowKey
  162. *
  163.     rsreset
  164. gfw_window        rs.l    1    ;window pointer
  165. gfw_font        rs.l    1    ;font used for window
  166. gfw_textattr        rs.l    1    ;TextAttr structure for that font
  167. gfw_visualinfo        rs.l    1    ;VisualInfo structure pointer
  168. gfw_fontx        rs.w    1    ;\  Size of font. GTFace will only
  169. gfw_fonty        rs.w    1    ;/  handle nonproportional fonts!
  170. gfw_lefto        rs.w    1    ;\  Size of left and top bar, taken
  171. gfw_topo        rs.w    1    ;/  from the window structure.
  172. gfw_glists        rs.l    3    ;list of gadget lists that are added
  173. gfw_clear        rs.w    1    ;contains color number of background
  174. gfw_horbd        rs.w    1    ;size of left and right border together
  175. gfw_vertbd        rs.w    1    ;size of top and bottom border together
  176.  
  177. gfw_idcmp        rs.l    1    ;IDCMP always needed
  178. gfw_menu        rs.l    1    ;menu appended
  179.  
  180. gfw_msgidcmp        rs.l    1    ;\
  181. gfw_msgcode        rs.w    1    ; |  These will contain a copy of
  182. gfw_msgqualifier    rs.w    1    ; |  the information from a
  183. gfw_msgaddr        rs.l    1    ; |  message comming from gadtools
  184. gfw_msgmousex        rs.w    1    ; |  or someone else that sends
  185. gfw_msgmousey        rs.w    1    ; |  to the window port.
  186. gfw_msgseconds        rs.l    1    ; |
  187. gfw_msgmicros        rs.l    1    ;/
  188.  
  189. gfw_winxpos        rs.w    1    ;\   Window dimensions of main window.
  190. gfw_winypos        rs.w    1    ; |  These are tracked by GetGTFMsg.
  191. gfw_winwidth        rs.w    1    ; |
  192. gfw_winheigth        rs.w    1    ;/
  193. gfw_winiwidth        rs.w    1    ;\   For OpenWindowScaled these are
  194. gfw_winiheigth        rs.w    1    ;/   also stored!
  195. gfw_zoomxpos        rs.w    1    ;\   Zoomed window dimensions. Also
  196. gfw_zoomypos        rs.w    1    ; |  tracked and updated by GetGTFMsg.
  197. gfw_zoomwidth        rs.w    1    ; |
  198. gfw_zoomheigth        rs.w    1    ;/
  199.  
  200. gfw_noscale        rs.b    1    ;set if no scaling for window...
  201.                     ;used for OpenWindowScaledLast
  202. gfw_domenu        rs.b    1    ;set while doing menu callers. Must
  203.                     ;be cleared when menu caller changes
  204.                     ;window or menu.
  205.  
  206. gfw_SIZEOF    rsval            ;
  207.  
  208.  
  209. *
  210. * GadgetKey
  211. *
  212.     rsreset
  213. gfg_next    rs.l    1        ;\ Used to link several lists to a window
  214. gfg_prev    rs.l    1        ;/ for easy refreshing.
  215. gfg_numof    rs.l    1        ;number of gadgets in created list.
  216. gfg_gnumof    rs.l    1        ;number of gadtools gadgets
  217. gfg_gadgets    rs.l    1        ;first gadget
  218. gfg_window    rs.l    1        ;window the gadgets are rendered for
  219. gfg_table    rs.l    1        ;table of gadget addresses
  220. gfg_remkey    rs.l    1        ;remember key for objects    
  221. gfg_objects    rs.l    1        ;remember key for objects    
  222. gfg_idcmp    rs.l    1        ;IDCMP for these gadgets
  223. gfg_SIZEOF    rsval            ;
  224.  
  225.  
  226. *
  227. * PosInfo
  228. *
  229.     rsreset
  230. gfp_xpos    rs.w    1        ;x-position of object
  231. gfp_ypos    rs.w    1        ;y-position (")
  232. gfp_width    rs.w    1        ;width of object
  233. gfp_heigth    rs.w    1        ;height of object
  234. gfp_SIZEOF    rsval
  235.  
  236. *--------------------------------------------------------------------
  237.  
  238. ;------------------
  239.     endif
  240.     end
  241.  
  242.